%移位y(n)=x(n-m)
function[y,ny]=seqshift(x,nx,m)
    ny=nx+m;
    y=x;
end